From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 5 Jan 2004 13:58:44 +0000 (+0000)
Subject: (finder-commentary): Call delete-other-windows.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~24575
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=8510f554d001f1d1baec0ed9ef0d869e5220b888;p=emacs.git

(finder-commentary): Call delete-other-windows.
---

diff --git a/lisp/finder.el b/lisp/finder.el
index 2958f36c3d9..0bd001752fe 100644
--- a/lisp/finder.el
+++ b/lisp/finder.el
@@ -282,6 +282,7 @@ FILE should be in a form suitable for passing to `locate-library'."
 	(error "Can't find any Commentary section"))
     ;; This used to use *Finder* but that would clobber the
     ;; directory of categories.
+    (delete-other-windows)
     (pop-to-buffer "*Finder-package*")
     (setq buffer-read-only nil)
     (erase-buffer)